Winzipper/Winzipper_ISO.iso/programming/oracle7 7.2/TOOLS/PLUS32/PLUS32.VRF

Text File | 1995-10-16 | 5.6 KB | 126 lines

/* Copyright (c) Oracle Corporation 1992.  All Rights Reserved */
/*****************************************************************************
  NAME
    plus32.vrf - V3.0.20.2.0 version analysis/product configuration script
         for Sql*Plus for Windows Nt/95 3.2

  DESCRIPTION
    This script checks dependencies and environment settings for the
    installation of Sql*Plus for Windows Nt/95 3.2

  OWNER
    Edan Kabatchnik

  MODIFIED    DD-MMM-YY  Reason
    Aedsinge  07/05/95 - Modified for v3.1 of the installer
    Aedsinge  06/06/95 -  Modified for version 3.2.2, Windows NT/95.
    Aedsinge  27-APR-95  Modified for Shared Oracle, Windows Sql*Plus 3.1.3.7.2
    LMurphy   08-SEP-94  Modified for Windows SQL*Plus 3.1.3.5.x
    LMurphy   23-MAY-94  Modified for Windows SQL*Plus 3.1.2.2.6
    shall     04-FEB-93  Created from RSF 7 vrf file
*****************************************************************************/
/*****************************************************************************
   Bind string variables & prompt strings...
*****************************************************************************/
{
        /*******************************************************************/
        /* Shared Oracle code */
        SHARED_ORACLE_COMPLIANT = TRUE;
        /* end Shared Oracle code */
        /*******************************************************************/
    { doit = execute("%installer_home%\win95.vrf"); }
    [
    'UNBOUND_VARIABLE:
    {
        required_version = product_version(ntinstver);
        temp = explode(required_version,".");
        required_version = implode(list(first(temp), first(rest(temp)),
                      first(rest(rest(temp))),
                      first(rest(rest(rest(temp))))),".");
        signal('failure, instantiate(nls("instver_too_early1","The version of the Installer currently running is %%installer_version%%.  The installation you have chosen requires version %%required_version%% or later.  Please run version %%required_version%% or later in order to perform this installation.")));
    }
    ]

    if (doit)
    {
        vrf_ratchet = "3.2.2.0.1";

        {
        set_plus32 = FALSE;

        plus32 = translate("PLUS32","$oracle");

        if (not(exists(plus32)))

            signal('UNBOUND_ENVIRONMENT_VARIABLE);
        }
        [ 'OS_ERROR, 'INVALID_FILE_NAME, 'FILE_NOT_FOUND,
        'PERMISSION_DENIED, 'UNBOUND_ENVIRONMENT_VARIABLE:
        {
            plus32 = "%oracle_home%\PLUS32";
            set_plus32 = TRUE;
        }
        ]

        { oracle_group_name = oracle_group_name; }
                [ 'UNBOUND_VARIABLE: oracle_group_name = nls("oracle_group_name","Oracle for Windows 95"); ]

        {
            set_sqlpath = FALSE;
            sqlpath = translate("SQLPATH","$oracle");
            if (not(exists(sqlpath)))
                signal('UNBOUND_ENVIRONMENT_VARIABLE);
        }
            [ 'OS_ERROR, 'INVALID_FILE_NAME, 'FILE_NOT_FOUND,
            'PERMISSION_DENIED, 'UNBOUND_ENVIRONMENT_VARIABLE:
            {
            sqlpath = "%ORACLE_HOME%\DBS";
            set_sqlpath = true;
            }
            ]

        installing_scripts = nls("installing_scripts", "Installing %%product_label%% Installation Scripts...");
        installing_exec = nls("installing_exec", "Installing %%product_label%% Executable...");
        installing_msbs = nls("installing_msbs", "Installing %%product_label%% Message Files...");
        installing_sql = nls("installing_sql", "Installing %%product_label%% SQL Scripts...");
        registering = nls("registering", "Registering %%product_label%%...");
        prod_label = nls("prod_label", "Modifying %%product_label%% Environment Variables...");
        installing_help = nls("installing_help", "Installing %%product_label%% Help Files...");
                plus32_expl = nls("plus32_expl", "%%product_label%% (PLUS32.EXE) is currently running on this machine. Please close this application before installing %%product_label%%.

Silent mode installation of %%product_label%% terminated.");
                plus32_run = instantiate(nls("plus32_run", "%%product_label%% (PLUS32.EXE) is currently running on this machine. Please close this application before installing %%product_label%%.

Choose OK after you have closed all Oracle applications and want to resume the installation of %%product_label%%.

Choose CANCEL to terminate the installation of %%product_label%%."));
                plus32_inst_term = instantiate(nls("plus32_inst_term", "%%product_label%% installation terminated."));
                plus32_run_content = instantiate(nls("plus32_run_content", "%%product_label%% Running"));
                plus32_run_help = instantiate(nls("plus32_run_help", "The Oracle Installer has detected that %%product_label%% (PLUS32.EXE) is currently running on this machine.  Please close this application before installing %%product_label%%.

Choose OK after you have closed all Oracle applications and want to resume the installation of %%product_label%%.

Choose CANCEL to terminate the installation of %%product_label%%."));

                done = FALSE;
                while(not(done))
                { move_file("%ORACLE_HOME%\bin\plus32.exe", "%ORACLE_HOME%\bin\plus32.exe"); done = TRUE; }
                [ 'PERMISSION_DENIED, 'INVALID_FILE_NAME, 'OS_ERROR, 'WRITE_ERROR:
                {
                        if (silent_mode)
                                signal('FAILURE, instantiate(plus32_expl));
                        else
                                information_dialog(instantiate(plus32_run), plus32_run_content, instantiate(plus32_run_help));
                }
                  'FILE_NOT_FOUND:
                        done = TRUE;
                ]
        return(sum(msg,nls_abbreviation,sql,deinstl,exe,help) + verify(w95rsf72));

    }
    else
        refresh_map_file = FALSE;
    return(0);
}